Clean up dead code

* lisp/net/gnutls.el (gnutls-async-sentinel): Remove.

diff --git a/lisp/net/gnutls.el b/lisp/net/gnutls.el
index 9e261a7b04f85b8faeaf16e4f5f44fa7c7ed45de..9cfa8251133b7b3e235042e016ec2f952a8b93c4 100644 (file)
--- a/lisp/net/gnutls.el
+++ b/lisp/net/gnutls.el
@@ -138,13 +138,6 @@ trust and key files, and priority string."
                         :type 'gnutls-x509pki
                         :hostname host))))
 
-(defun gnutls-async-sentinel (process change)
-  (when (string-match "open" change)
-    (gnutls-negotiate :process process
-                      :type 'gnutls-x509pki
-                      :hostname (car (process-contact process)))
-    (gnutls-mark-process process nil)))
-
 (define-error 'gnutls-error "GnuTLS error")
 
 (declare-function gnutls-boot "gnutls.c" (proc type proplist))